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OCTAL MEM DUMP - EXTENDED MEMORY 


DECUS Program Library Write-up 


DECUS NO. 8-404 


ABSTRACT 

The major objective of this program is similar to 
Digital-8-6-U, to dump on teletype the octal memo¬ 
ry contents of a certain prescribed memory block/ 
blocks. The added modifications are; 

(a) A CDF instruction: To allow the user 
to dump contents from any field with¬ 
out restarting the program. 

(b) Tab routine: Will tab ten spaces be¬ 
fore any printing or dumping into a 

a new line. 

(c) ASCII characters typing routine: Will 
permit the user to type a line of head¬ 
ing or title. 

(d) After ten blank spaces an absolute add¬ 
ress will be typed, then followed by 
the octal contents of the first eight 
words. This process repeats until the 
block is exhausted. 

The user may dump the octal contents of the next 
block from the same field or the next field. 


REQUIREMENTS 

Storage 

This program will occupy memory locations 7400-7561. 
A total of 114 (decimal) core locations. 

Equipment 

Basic 4K and/Extended Memory PDP-8 with ASR-33 
Teletype. Output is obtained from the teletype. 







LOADING PROCEDURES 

This program is loaded by means of the Binary 
Loader. See DEC-08-LBAA-D. 


OPERATING PROCEDURES 

1. Load program by the BIN loader. 

2. Set SR= 7400, hit LOAD ADDRESS and START. 
Program will halt. 

3. Set SR(Bits 6-8)=Memory Field of block whose 
octal contents are to be dumped, then press 
CONTINUE. 

4 . Set SR=Initial Address of block and press 
CONTINUE. 

3. Set SR=Final Address of block and press 
CONTINUE. 

6. Teletype will CR, LF and tab ten spaces. The 
program is now waiting for the user to type 
a line of heading if he wishes to do so, 
otherwise type carriage RETURN. 

7. The program will immediately commenced dump¬ 
ing out the requested memory contents, until 
the block is exhausted. To dump contents of 
the next block repeat steps 3 to 6. 


PROGRAM LISTING 

A listing of the program is attached. 
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* 74301 


/"OC r AL MEn DUMP'* -F > IENDED MEMORY 

/ 

/AMURES T. SIY 

/CAPITOL I MS 1 ITUTE OF TECHNOLOGY 


/KENS I NGTON 
/DEC .97'70 
/ 

/ 



7402 

OD(JM.» 

RLT 

/SRC 

m :* i 

7 604 


LAS 


740 R 

0356 


and 

viASK 7/ 

/A. 7! 3 

33 50 


DC A 

ELD 

74A4 

1351 


r A D 

X h LD 

740 5 

1 350 


TAD 

ELD 

740 6 

320 / 


DC A 

• + 1 

740 7 

0000 


CT 


741 3 

7432 


RLT 


/41 1 

7604 


LAS 


/41 o 

32 76 


DC A 

LOCK 

7413 

7402 


EL 1 


74 1 4 

7 60 4 


LAS 


741 5 

7040 


C MA 


741 6 

1276 


TAD 

LOCK 

741 7 

3277 


DC A 

L I M 

/4P* 

7300 

ACCEPT* 

C LA 

CLL 

/4p 1 

4265 


JYS 

ChLF 

74 P R 

4342 


J V :S 

LIS N 

74 R 3 

7041 


CIA 


74 P 4 

1 304 


TAD 

CONS+1 

742 3 

7 640 


5 TLA 

CLA 

/4P6 

5222 


J'iP 

• -4 

/4p 7 

5232 


JMP 

.+3 

/4 3 0 

2300 

DO i-2* 

IS/ 

LPC N 

7431 

5245 


Jt v iP 

DU M3 

7432 

130 7 


TAD 

CONS+4 

7433 

3300 


DC A 

LPCN 

7434 

4265 


J: V »S 

CRL.F 

/43B 

1276 


TA D 

LOCK 

743 f 

4 702 


J^S 

I PRIM 

774 3 7 

1 30 6 


TA D 

CONS+3 

7440 

3265 


DC A 

CRLF 

7 4 41 

1 30 5 


TAD 

CONS+2 

74 4 p 

42 57 


J*’S 

TYPN 

744 3 

2265 


ISZ 

CRLF 


MD. 207V5 

E)= MF.E FIELD OF BLOCK TO BF DU *■». 


/SR»IMT. A DDR 
/SAVE I N IT* A DDR 
/SH=FINAL A DDR 

/INITIALISE PAN oh CuiJN IFF 

/TERMINATE HhA DIN 0 i 
/AEGl OiJ # 

/KMj UF. LI M 

/ - R 

/!" t 5 h 1 I T K iVJ C GUM EF 
/CABP . RET • AM; LIM Hr.I 

/INTER-COE. TO PMJi* 

/-4 

/240 CSPACF) 
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7444 

524 1 


JmP 

.-3 


744 5 

7205 

0LM3 > 

CLA 



744 6 

1 67 6 


FAD 

X LUCK 


744 7 

4702 


JMS 

I PH IN 

/1 N T F.R -CO M . T 0 ° N 0 M 

7450 

1 30 5 


TAD 

CONS+2 

/240 (SPACE) 

74 51 

42 57 


JMS 

TYPN 


/452 

22 7 6 


ISZ 

LOCK 

/INDEX LOG A T I on OOIMFP 

7453 

2277 


ISZ 

LIM 

/END OF RAN OF. 

/454 

5230 


jmp 

DU M2 


74 55 

4265 


JMS 

CRLF 


/4 56 

5200 


JMP 

ODUM 

/GO AGAIN 

74 5 7 

0000 

TYPIw 

0 


/T Y P E CHAR AC T F R S UBR 0UI' I N ¥. 

7460 

6046 


TLS 



74 61 

6041 


TSF 



74 62 

5261 


JMP 

.-1 


7463 

7200 


CLA 



/464 

5 65 7 


JMP 

I TYPN 


7465 

0000 

CRLKj 

0 


/CR AND Lr SUBROUTINE 

7466 

7200 


CLA 



/46 7 

1 304 


TAD 

CONS+1 

/215 (CARR . RET.) 

74 70 

4257 


JMS 

TYPN 


74 71 

130 3 


TAD 

CONS 

/212 (LINE FEED) 

7472 

4257 


JMS 

TYPN 


/ 4 7 3 

1 31 0 


TAD 

CONS+5 


74 74 

4333 


JMS 

TA3 


747 5 

5665 


JMP 

I CRLF 


74 76 

0000 

LOCK > 

0 



74 7 7 

0000 

LIM, 

0 



7500 

0000 

LPCN* 

0 



7501 

0000 

KTABj 




7502 

/51 1 

PH IK* 

PMJM 

/INTER-COM. TO PNtJM 

7503 

0212 

CONS* 

212 


/CONSTANTS 

7504 

021 5 


215 



750 5 

0240 


240 



750 6 

77 74 


7774 



750 7 

7770 


7 770 


7510 

7766 


7 76 6 


751 1 

0000 

PNUM* 

0 


/PRINT NUMBER SUBROUTINE 

7512 

3354 


DC A 

PTEM 


7513 

1 357 


TAD 

PC ON 

/ 7 7 74 

7514 

3353 


DC A 

DCN 

/INITIALIZE DIGIT COUNTER 

751 5 

1354 


TAD 

PTEM 


751 6 

7004 


HAL 



751 7 

7004 

PNU2* 

RAL 



7520 

700 6 


RTL 



/521 

3354 


DC A 

PTEM 


7522 

1354 


TAD 

PTEM 


7523 

0360 


AND 

PCON+1 

/7 

7524 

1361 


TAD 

PCON+2 

/2 60 
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/ 


752 5 

4755 


JMS 

I TDIT 

7526 

1354 


TAD 

PTEM 

752 7 

2353 


ISZ. 

DCN 

7530 

531 7 


JMP 

PNU2 

7531 

7200 


CLA 


7532 

571 1 


JMP 

I PNUM 

7533 

0000 

TAB# 

0 


7534 

3301 


DC A 

KTAB 

7535 

130 5 


TAD 

CONS+2 

7536 

4257 


JMS 

TYPN 

753 7 

2301 


ISZ 

KTAB 

7540 

5335 


JMP 

.-3 

7541 

5/33 


JMP 

I TAB 

/542 

0000 

LISN# 

0 


7543 

6031 


KSF 


7544 

5343 


JMP 

.-1 

7545 

6036 


KRB 


^^.7546 

6046 


TLS 


“ 754 7 

5/42 


JMP 

I LI SN 

7550 

0000 

FLD# 

0 


7551 

620 1 

XFLD# 

CDF 


75 52 

0000 

CHAR# 

0 


7553 

0000 

DCN# 

0 


7554 

0000 

PTEM# 

0 


7555 

7457 

TDIT# 

TYPN 

7556 

00 70 

MASK70# 

70 


7557 

77 74 

PC ON# 

7774 

7560 

000 7 


7 


7561 

02 60 


2 60 



/TYPN (TYPE. A DIGIT) 


/TAB TF.N SPACES BEFOhE DUMPING. 


/DIGIT COUNTER 


ACCEPT 

CHAR 

CONS 

CELT 

DC tv 

DU M2 

DU M3 

FLD 

KTAB 

LIM 

LISN 

LOCH 

LPCtv 

MASK 70 

ODUM 

PC ON 

PNUM 

PMU2 

PR IN 

PTEM 

TAB 

TDIT 

TYPN 

FFLD 


7420 

7552 
7503 
7465 

7553 
7430 
7445 
7550 

7501 
7477 
7542 
7476 
7500 

7556 
7400 

7557 
751 1 
7517 

7502 

7554 
7533 

7555 
7457 
7 551 
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SAMPLE 

"OCTAL 

'vj 7 ; 

DU i V: P - 

EXTFLDFD • 

•EL ORV 

* i 


7 44 4 

7402 

/ 64 4 

0356 

33 55 

1351 

1 3 50 

320 7 

68 " 1 

7410 

7408 

764 

38 7 6 

7432 

7 64 4 

74 44 

1 2 7 6 

32 7 7 

74.20 

7300 

42 6 b 

4342 

/041 

1 30 4 

7 64.4 

5222 

52 32 

7 430 

230 4 

5245 

l 30 7 

3350 

48 65 

1.2 76 

4/4 8 

1 34 6 

7 440 

3266 

1 34 5 

42 5 / 

22 65 

5241 

7200 

1 67 6 

4/4 2 

/ 4 50 

1 30 5 

48 5 / 

2 8 7 6 

22/7 

5230 

42 6 5 

684 0 

74 58 

7 4 64 

6 0 4 6 

6 ) 4 1 

52 61 

7200 

565 7 

0000 

7 8 0 4 

1 344 

7 4 7 4 

42 6 7 

1 3-”13 

485 7 

1310 

4333 

5 665 

74 7 6 

7 715 

/ 5 # 0 

7 770 

55 Vt 

751 i 

0212 

0215 

0840 

7 7 / 4 

7 7/4 

/ 5 1 4 

7 766 

74 64 

33 34 

1 3 57 

3353 

1 3 5 4 

/ - ^4 

/ '* i /• 

/ 504 

704 6 

33 64 

1 3 54 

■'3 60 

1361 

4 7 5 5 

l 3-.4 

8 3 6 3 

7 634 

631 7 

7230 

5/11 

74 7 s 

330 1 

1 34 5 

48 6 7 

8 3 4 1 

/ 640 

633 6 

6 7 33 

?*83 

e 'i 31 

6343 

6 m 3# 6 

64 4 n 

6 748 

7 664 

/ 664 

044 4 
044 / 

624 1 
* 2 6' 1 

•VI--' * 

^00 

4 0 0 0 

74 57 

4 4 / 4 

/ / 74 
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